a := 0;
b := 0; 

while a do 
    b := b * a; 
    a := a - 1 
od;

while b do 
    b := b * a; 
    a := a - 1 
od;

c := 10;

while c do 
    c := c - 1; 
    a := a + b;
    b := a + c 
od;

if c then
    d := 777
else
    d := 888
fi